home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Cream of the Crop 21
/
Cream of the Crop 21 (Terry Blount) (October 1996).iso
/
program
/
multlang.zip
/
MDLGS.DFM
/
MDLGS.txt
Wrap
Text File
|
1996-06-10
|
5KB
|
223 lines
object DlgsDlg: TDlgsDlg
Left = 275
Top = 156
Width = 390
Height = 274
Caption = 'Common Dialogs'
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
FormStyle = fsMDIChild
Position = poScreenCenter
Visible = True
OnClose = FormClose
PixelsPerInch = 96
TextHeight = 13
object Label1: TLabel
Left = 8
Top = 4
Width = 361
Height = 69
Alignment = taCenter
AutoSize = False
Caption =
'The TMultLang component can translate all 16-bit and 32-bit Comm' +
'on Dialogs (Open, Save, Find etc) via the external MDialogs unit' +
'.'
Font.Color = clBlack
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
end
object Label2: TLabel
Left = 8
Top = 84
Width = 357
Height = 33
AutoSize = False
Caption = 'Click on any of the buttons to show the corresponding dialog.'
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Button1: TButton
Left = 12
Top = 128
Width = 141
Height = 25
Caption = 'Open Dlg'
TabOrder = 0
OnClick = Button1Click
end
object Button2: TButton
Left = 12
Top = 156
Width = 141
Height = 25
Caption = 'Save Dlg'
TabOrder = 1
OnClick = Button2Click
end
object Button3: TButton
Left = 12
Top = 184
Width = 141
Height = 25
Caption = 'Print Dlg'
TabOrder = 2
OnClick = Button3Click
end
object Button4: TButton
Left = 12
Top = 212
Width = 141
Height = 25
Caption = 'Printer Setup Dlg'
TabOrder = 3
OnClick = Button4Click
end
object Button5: TButton
Left = 224
Top = 128
Width = 137
Height = 25
Caption = 'Find Dlg'
TabOrder = 4
OnClick = Button5Click
end
object Button6: TButton
Left = 224
Top = 156
Width = 137
Height = 25
Caption = 'Replace Dlg'
TabOrder = 5
OnClick = Button6Click
end
object Button7: TButton
Left = 224
Top = 184
Width = 137
Height = 25
Caption = 'Font Dlg'
TabOrder = 6
OnClick = Button7Click
end
object Button8: TButton
Left = 224
Top = 212
Width = 137
Height = 25
Caption = 'Color Dlg'
TabOrder = 7
OnClick = Button8Click
end
object MultLang1: TMultLang
Left = 296
Top = 44
Width = 45
Height = 22
AlignIcon = alLeft
AlignText = alLeft
IconMargin = 1
ItemHeight = 16
Items.Strings = (
'English'
'Swedish')
ShowIcons = False
Text = 'English'
ResizeIcon = False
TextMargin = 5
DefaultLanguage = 'English'
LanguageFile = '%EXEPath%Mdiapp.lan'
LanguagesData = {}
end
object MOpenDialog1: TMOpenDialog
FileEditStyle = fsEdit
Options = [ofShowHelp]
Title = 'Open Dialog, Note that you can also change font and size'
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Arial'
Font.Pitch = fpVariable
Font.Style = []
Left = 8
Top = 52
end
object MSaveDialog1: TMSaveDialog
FileEditStyle = fsEdit
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Arial'
Font.Pitch = fpVariable
Font.Style = []
Left = 36
Top = 52
end
object MPrintDialog1: TMPrintDialog
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Arial'
Font.Pitch = fpVariable
Font.Style = []
Left = 64
Top = 52
end
object MPrinterSetupDialog1: TMPrinterSetupDialog
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Arial'
Font.Pitch = fpVariable
Font.Style = []
Left = 92
Top = 52
end
object MFindDialog1: TMFindDialog
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Arial'
Font.Pitch = fpVariable
Font.Style = []
Left = 120
Top = 52
end
object MReplaceDialog1: TMReplaceDialog
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Arial'
Font.Pitch = fpVariable
Font.Style = []
Left = 148
Top = 52
end
object MFontDialog1: TMFontDialog
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Courier New'
Font.Pitch = fpVariable
Font.Style = []
MinFontSize = 0
MaxFontSize = 0
DisplayFont.Color = clBlack
DisplayFont.Height = -11
DisplayFont.Name = 'Arial'
DisplayFont.Style = []
Left = 176
Top = 52
end
object MColorDialog1: TMColorDialog
Ctl3D = True
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Arial'
Font.Pitch = fpVariable
Font.Style = []
Left = 204
Top = 52
end
end